
Paramtrisation initiale de la bouteille de Klein : 
==================================================

p=2*PI*u;
q=2*PI*v;
r=4*(1-cos(p)/2);

x1=6*cos(p)*(1+sin(p))+r*cos(p)*cos(q);

x2=6*cos(p)*(1+sin(p))-r*cos(q);

x=((p<=PI)?x1:x2);


y1=16*sin(p)+r*sin(p)*cos(q);

y2=16*sin(p);

y=((p<=PI)?y1:y2);

z=r*sin(q);  

